home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 July
/
CMCD0704.ISO
/
Software
/
Shareware
/
Comunicatii
/
blogjet
/
BlogJetSetup-bn.exe
/
{app}
/
BlogJet.exe
/
0
/
RCDATA
/
TACCOUNTSFORM
/
TACCOUNTSFORM.txt
< prev
Wrap
Text File
|
2004-06-07
|
21KB
|
871 lines
object AccountsForm: TAccountsForm
Left = 285
Top = 197
BorderStyle = bsDialog
Caption = 'Account Wizard - BlogJet'
ClientHeight = 304
ClientWidth = 466
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Shape1: TShape
Left = 4
Top = 0
Width = 462
Height = 263
Align = alClient
Pen.Color = clWhite
end
object Bevel1: TBevel
Left = 0
Top = 263
Width = 466
Height = 2
Align = alBottom
Shape = bsBottomLine
end
object Image4: TImage
Left = 0
Top = 0
Width = 4
Height = 263
Align = alLeft
AutoSize = True
Picture.Data = {<image000.bmp>}
end
object Notebook1: TNotebook
Left = 4
Top = 0
Width = 462
Height = 263
Align = alClient
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
PageIndex = 5
ParentColor = False
ParentFont = False
TabOrder = 0
OnPageChanged = Notebook1PageChanged
object TPage
Left = 0
Top = 0
Caption = 'Welcome'
object Label5: TLabel
Left = 152
Top = 122
Width = 245
Height = 26
Caption =
'(The wizard will help you to choose a blog provider and subscrib' +
'e.)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clGrayText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Label6: TLabel
Left = 152
Top = 180
Width = 232
Height = 26
Caption =
'(The wizard will help you to configure BlogJet to post to your e' +
'xisting blog.)'
Font.Charset = DEFAULT_CHARSET
Font.Color = clGrayText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
WordWrap = True
end
object Image1: TImage
Left = 8
Top = 40
Width = 100
Height = 210
AutoSize = True
Picture.Data = {<image001.bmp>}
end
object Label9: TLabel
Left = 16
Top = 8
Width = 245
Height = 24
Caption = 'Welcome to Account Wizard!'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label20: TLabel
Left = 136
Top = 48
Width = 296
Height = 26
Caption =
'This wizard will guide you through your blog account creation. Y' +
'ou should create at least one account to post with BlogJet.'
WordWrap = True
end
object NewBlogRadio: TRadioButton
Left = 136
Top = 104
Width = 209
Height = 17
Caption = 'I do not have a blog yet'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
TabStop = True
end
object HaveBlogRadio: TRadioButton
Left = 136
Top = 160
Width = 201
Height = 17
Caption = 'I already have a blog'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'NewBlog'
object Label7: TLabel
Left = 16
Top = 8
Width = 328
Height = 24
Caption = 'Select the blog provider and subscribe'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 16
Top = 32
Width = 369
Height = 13
Caption =
'You can get more information and subscribe by clicking the name ' +
'of provider.'
end
object Webbrowser1: TEmbeddedWB
Left = 16
Top = 64
Width = 425
Height = 185
TabOrder = 0
OnNewWindow2 = WebBrowser1NewWindow2
OnDocumentComplete = WebBrowser1DocumentComplete
DownloadOptions = [DLCTL_DLIMAGES, DLCTL_VIDEOS, DLCTL_BGSOUNDS]
UserInterfaceOptions = []
PrintOptions.Margins.Left = 19.050000000000000000
PrintOptions.Margins.Right = 19.050000000000000000
PrintOptions.Margins.Top = 19.050000000000000000
PrintOptions.Margins.Bottom = 19.050000000000000000
PrintOptions.Header = '&w&bPage &p of &P'
PrintOptions.HTMLHeader.Strings = (
'<HTML></HTML>')
PrintOptions.Footer = '&u&b&d'
PrintOptions.Orientation = poPortrait
ReplaceCaption = False
EnableDDE = False
fpExceptions = True
ControlData = {
4C000000ED2B00001F1300000000000000000000000000000000000000000000
000000004C000000000000000000000001000000E0D057007335CF11AE690800
2B2E126208000000000000004C0000000114020000000000C000000000000046
8000000000000000000000000000000000000000000000000000000000000000
00000000000000000100000000000000000000000000000000000000}
end
end
object TPage
Left = 0
Top = 0
Caption = 'Settings'
object Label1: TLabel
Left = 134
Top = 56
Width = 44
Height = 13
Caption = 'Provider:'
end
object Label2: TLabel
Left = 152
Top = 152
Width = 26
Height = 13
Caption = 'Host:'
end
object Label3: TLabel
Left = 154
Top = 200
Width = 24
Height = 13
Caption = 'Port:'
end
object Label4: TLabel
Left = 150
Top = 176
Width = 28
Height = 13
Caption = 'Page:'
end
object Label10: TLabel
Left = 136
Top = 104
Width = 234
Height = 26
Caption =
'Custom host settings (do not change unless you are using custom ' +
'blog server):'
WordWrap = True
end
object Image2: TImage
Left = 8
Top = 40
Width = 100
Height = 210
AutoSize = True
Picture.Data = {<image002.bmp>}
end
object Label21: TLabel
Left = 16
Top = 8
Width = 204
Height = 24
Caption = 'Edit connection settings'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
end
object JvLinkLabel1: TJvLinkLabel
Left = 136
Top = 232
Width = 97
Height = 13
Caption = '<link>Configure Proxy...</link>'
Text.Strings = (
'<link>Configure Proxy...</link>')
Transparent = False
Layout = tlTop
LinkColor = clHighlight
LinkColorClicked = clRed
LinkColorHot = clHotLight
LinkStyle = [fsUnderline]
HotLinks = True
AutoHeight = True
MarginWidth = 0
MarginHeight = 0
OnClick = JvLinkLabel1Click
end
object ComboBoxEx1: TComboBoxEx
Left = 192
Top = 51
Width = 169
Height = 22
ItemsEx = <>
Style = csExDropDownList
ItemHeight = 16
TabOrder = 0
OnSelect = ComboBoxEx1Select
Images = MainForm.BlogLogoImages
DropDownCount = 11
end
object HostEdit: TEdit
Left = 192
Top = 148
Width = 161
Height = 21
TabOrder = 1
end
object PortEdit: TEdit
Left = 192
Top = 196
Width = 65
Height = 21
TabOrder = 3
Text = '80'
OnExit = PortEditExit
OnKeyPress = PortEditKeyPress
end
object PageEdit: TEdit
Left = 192
Top = 172
Width = 161
Height = 21
TabOrder = 2
end
end
object TPage
Left = 0
Top = 0
Caption = 'Login'
object Label13: TLabel
Left = 16
Top = 32
Width = 286
Height = 13
Caption = 'Please enter username and password of your blog account.'
Transparent = True
WordWrap = True
end
object Label14: TLabel
Left = 136
Top = 128
Width = 52
Height = 13
Caption = 'Username:'
end
object Label15: TLabel
Left = 138
Top = 152
Width = 50
Height = 13
Caption = 'Password:'
end
object Label18: TLabel
Left = 16
Top = 8
Width = 255
Height = 24
Caption = 'Enter username and password'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
Transparent = True
end
object Image3: TImage
Left = 8
Top = 48
Width = 100
Height = 210
AutoSize = True
Picture.Data = {<image003.bmp>}
end
object UsernameEdit: TEdit
Left = 200
Top = 124
Width = 153
Height = 21
TabOrder = 0
end
object PasswordEdit: TEdit
Left = 200
Top = 148
Width = 153
Height = 21
PasswordChar = '*'
TabOrder = 1
end
object chkSavePassword: TCheckBox
Left = 200
Top = 176
Width = 97
Height = 17
Caption = 'Save password'
TabOrder = 2
end
end
object TPage
Left = 0
Top = 0
Caption = 'BlogID'
object Label11: TLabel
Left = 16
Top = 8
Width = 96
Height = 24
Caption = 'Select blog'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 128
Top = 40
Width = 270
Height = 26
Caption =
'BlogJet has found more than one blog on your account. Please sel' +
'ect the blog you wish to add.'
WordWrap = True
end
object ListBox1: TListBox
Left = 128
Top = 80
Width = 273
Height = 177
ItemHeight = 13
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'FTP'
object Image5: TImage
Left = 8
Top = 48
Width = 100
Height = 210
AutoSize = True
Picture.Data = {<image004.bmp>}
end
object Label28: TLabel
Left = 16
Top = 8
Width = 215
Height = 24
Caption = 'Configure FTP connection'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
Transparent = True
end
object JvLinkLabel2: TJvLinkLabel
Left = 112
Top = 237
Width = 249
Height = 13
Caption = '<link>I do not have a hosting with FTP support</link>'
Text.Strings = (
'<link>I do not have a hosting with FTP support</link>')
Transparent = False
Layout = tlTop
LinkColor = clHighlight
LinkColorClicked = clRed
LinkColorHot = clHotLight
LinkStyle = [fsUnderline]
HotLinks = False
AutoHeight = True
MarginWidth = 0
MarginHeight = 0
OnClick = JvLinkLabel2Click
end
object UseFTPCheck: TCheckBox
Left = 98
Top = 40
Width = 327
Height = 17
BiDiMode = bdLeftToRight
Caption =
' Use FTP to upload pictures and other files that I insert in tex' +
't.'
ParentBiDiMode = False
TabOrder = 0
OnClick = UseFTPCheckClick
end
object Panel2: TPanel
Left = 96
Top = 64
Width = 361
Height = 169
BevelOuter = bvNone
Color = clWhite
TabOrder = 1
object Label23: TLabel
Left = 16
Top = 38
Width = 74
Height = 13
Caption = 'Remote Folder:'
end
object Label24: TLabel
Left = 256
Top = 4
Width = 24
Height = 13
Caption = 'Port:'
end
object Label26: TLabel
Left = 16
Top = 110
Width = 52
Height = 13
Caption = 'Username:'
end
object Label27: TLabel
Left = 16
Top = 134
Width = 50
Height = 13
Caption = 'Password:'
end
object Label25: TLabel
Left = 16
Top = 71
Width = 49
Height = 13
Caption = 'Base URL:'
end
object Label34: TLabel
Left = 125
Top = 20
Width = 116
Height = 11
Alignment = taRightJustify
Caption = 'Example: ftp.myhosting.com'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentFont = False
end
object Label35: TLabel
Left = 162
Top = 54
Width = 159
Height = 11
Alignment = taRightJustify
Caption = 'Examples: /public_html/blog, /web/blog'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentFont = False
end
object Label36: TLabel
Left = 150
Top = 87
Width = 171
Height = 11
Alignment = taRightJustify
Caption = 'Example: http://www.myhosting.com/blog/'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentFont = False
end
object JvLinkLabel3: TJvLinkLabel
Left = 16
Top = 156
Width = 249
Height = 13
Caption = '<link><b>Test this configuration...</b></link>'
Text.Strings = (
'<link><b>Test this configuration...</b></link>')
Transparent = False
Layout = tlTop
LinkColor = clHighlight
LinkColorClicked = clRed
LinkColorHot = clHotLight
LinkStyle = [fsUnderline]
HotLinks = False
AutoHeight = True
MarginWidth = 0
MarginHeight = 0
OnClick = JvLinkLabel3Click
end
object Label22: TLabel
Left = 16
Top = 4
Width = 57
Height = 13
Caption = 'FTP Server:'
end
object FTPHostEdit: TEdit
Left = 96
Top = 0
Width = 145
Height = 21
TabOrder = 0
Text = 'ftp.myhosting.com'
end
object FTPFolderEdit: TEdit
Left = 96
Top = 34
Width = 225
Height = 21
TabOrder = 2
Text = '/web/blog'
end
object FTPPortEdit: TEdit
Left = 286
Top = 0
Width = 33
Height = 21
TabOrder = 1
Text = '21'
OnExit = FTPPortEditExit
OnKeyPress = PortEditKeyPress
end
object FTPUsernameEdit: TEdit
Left = 96
Top = 106
Width = 161
Height = 21
TabOrder = 4
end
object FTPPasswordEdit: TEdit
Left = 96
Top = 130
Width = 161
Height = 21
PasswordChar = '*'
TabOrder = 5
end
object FTPURLEdit: TEdit
Left = 96
Top = 67
Width = 225
Height = 21
TabOrder = 3
Text = 'http://www.myhosting.com/blog/'
end
end
end
object TPage
Left = 0
Top = 0
Caption = 'Images'
object Label29: TLabel
Left = 16
Top = 8
Width = 216
Height = 24
Caption = 'File Upload Configuration'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
end
object Image6: TImage
Left = 8
Top = 48
Width = 100
Height = 210
AutoSize = True
Picture.Data = {<image005.bmp>}
end
object Label30: TLabel
Left = 146
Top = 131
Width = 203
Height = 13
Caption = 'Path for files on host (blank for blog root):'
Enabled = False
end
object Label31: TLabel
Left = 146
Top = 184
Width = 108
Height = 13
Caption = 'Address of files (URL):'
Enabled = False
end
object Label32: TLabel
Left = 128
Top = 40
Width = 256
Height = 26
Caption =
'You can enter custom settings for publishing pictures and other ' +
'files that you insert in posts.'
WordWrap = True
end
object Label33: TLabel
Left = 328
Top = 169
Width = 72
Height = 11
Caption = 'Example: images/'
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Small Fonts'
Font.Style = []
ParentFont = False
end
object ImagesPathEdit: TEdit
Left = 144
Top = 148
Width = 259
Height = 21
Enabled = False
TabOrder = 0
OnChange = ImagesPathEditChange
end
object ImagesURLEdit: TEdit
Left = 146
Top = 200
Width = 257
Height = 21
Enabled = False
TabOrder = 1
end
object RadioButton1: TRadioButton
Left = 128
Top = 80
Width = 241
Height = 17
Caption = 'Use default upload location'
Checked = True
TabOrder = 2
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 128
Top = 104
Width = 185
Height = 17
Caption = 'Use custom settings:'
TabOrder = 3
OnClick = RadioButton1Click
end
end
object TPage
Left = 0
Top = 0
Caption = 'Finished'
object Label16: TLabel
Left = 120
Top = 88
Width = 148
Height = 13
Caption = 'Enter the title for this account:'
end
object Label17: TLabel
Left = 120
Top = 144
Width = 131
Height = 13
Caption = 'Address of your blog page:'
end
object Label19: TLabel
Left = 16
Top = 8
Width = 273
Height = 24
Caption = 'Enter Account Title and Address'
Font.Charset = DEFAULT_CHARSET
Font.Color = 14059352
Font.Height = -19
Font.Name = 'Trebuchet MS'
Font.Style = []
ParentFont = False
end
object BlogTitleEdit: TEdit
Left = 120
Top = 108
Width = 273
Height = 21
TabOrder = 0
end
object AddressEdit: TEdit
Left = 120
Top = 160
Width = 273
Height = 21
TabOrder = 1
Text = 'http://'
end
end
end
object Panel1: TPanel
Left = 0
Top = 265
Width = 466
Height = 39
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object StatusLabel: TLabel
Left = 11
Top = 12
Width = 66
Height = 13
Caption = 'Connecting...'
Visible = False
end
object btnNext: TButton
Left = 288
Top = 7
Width = 75
Height = 25
Caption = 'Next >'
Default = True
TabOrder = 0
OnClick = btnNextClick
end
object btnCancel: TButton
Left = 384
Top = 7
Width = 75
Height = 25
Cancel = True
Caption = 'Cancel'
TabOrder = 1
OnClick = btnCancelClick
end
object btnBack: TButton
Left = 208
Top = 7
Width = 75
Height = 25
Caption = '< Back'
Enabled = False
TabOrder = 2
OnClick = btnBackClick
end
end
end